home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / telecomm / misc / amirec12.lha / Ced / AmiRecRSave.rexx < prev   
Encoding:
OS/2 REXX Batch file  |  1994-09-08  |  1.2 KB  |  59 lines
  1. /*
  2. ** AmiRecRSave.ced 
  3. **
  4. ** $AmiRecRSave 1.0 (07.09.94), written by Janne Saarme.
  5. **
  6. ** This script is an ARexx program for communicating with CED.
  7. ** Requires CygnusEd Professional v3.5 (or later) to run.
  8. ** 
  9. **
  10. ** What this do? 
  11. **        To pipe "order" for AmiRec.
  12. **
  13. ** How to install script?
  14. **
  15. ** Edit this script for your needs and save it in ARexx directory.
  16. **
  17. ** Select Special
  18. **
  19. **    Dos/Arexx interface
  20. **    Install dos/Arexx command...
  21. **
  22. **   from CED. Enter the function key number you want to assign.
  23. **   Give AmiRecRSave and ENTER.
  24. **
  25. **   If you wish to save these commands, select "Save Dos/ARexx commands..."
  26. **
  27. */
  28.  
  29. /* Path and filename of tempfile */
  30. savefile = 'Ram:TempFile'        
  31.  
  32. /* Path and filename of header */
  33. /* If you do not want to use header, skip this (do not remove header line */
  34. header   = 'Texts:UUcp/RecentHeader'
  35.  
  36. /* Path and filename of output */
  37. output   = 'Ram:getfiles'
  38.  
  39. /* Path and filename of Amirec */
  40. program  = 'Bin:AmiRec '
  41.  
  42. OPTIONS RESULTS
  43.  
  44.  
  45. /* Set the default port name so that commands go to CED. */
  46. ADDRESS "rexx_ced"
  47.  
  48. SAVE AS savefile
  49. ADDRESS "COMMAND" program savefile output header
  50.  
  51. /* Load outputfile or quit */
  52. OKAY2 "Do you want to load "output" ?"
  53. if (RESULT = 1) THEN
  54.     OPEN 
  55. ELSE
  56.  
  57. EXIT 0
  58.  
  59.